home *** CD-ROM | disk | FTP | other *** search
/ Aminet 28 / Aminet 28 (1998)(GTI - Schatztruhe)[!][Dec 1998].iso / Aminet / util / libs / graphics3d.lha / src / library / graphics3dm.c < prev    next >
Encoding:
Text File  |  1998-10-17  |  926 b   |  48 lines
  1. /*
  2. **      $VER: graphics3Dm.c 10.00 (03.03.98)
  3. **
  4. **      Math functions for graphics3D.library 
  5. **
  6. **    Note: this code is take from math lib sources of C Compiler VBCC 
  7. **          
  8. */
  9.  
  10. /* moltiplicazione fra 2 numeri double float */
  11.  xref _MathIeeeDoubBasBase
  12.  
  13.  xdef __ieeemuld
  14. __ieeemuld:
  15.  movem.l a6/d2-d3,-(sp)
  16.  move.l  _MathIeeeDoubBasBase,a6
  17.  movem.l 16(sp),d2-d3
  18.  movem.l 24(sp),d0-d1
  19.  jsr     -78(a6)
  20.  movem.l (sp)+,a6/d2-d3
  21.  rts
  22.  
  23. /* divisione fra 2 numeri double float */
  24.  xref _MathIeeeDoubBasBase
  25.  
  26.  xdef __ieeedivd
  27. __ieeedivd:
  28.  movem.l a6/d2-d3,-(sp)
  29.  move.l  _MathIeeeDoubBasBase,a6
  30.  movem.l 16(sp),d0-d1
  31.  movem.l 24(sp),d2-d3
  32.  jsr     -84(a6)
  33.  movem.l (sp)+,a6/d2-d3
  34.  rts
  35.  
  36. /* somma tra 2 numeri double float */
  37.  xref _MathIeeeDoubBasBase
  38.  
  39.  xdef __ieeeaddd
  40. __ieeeaddd:
  41.  movem.l a6/d2-d3,-(sp)
  42.  move.l  _MathIeeeDoubBasBase,a6
  43.  movem.l 16(sp),d2-d3
  44.  movem.l 24(sp),d0-d1
  45.  jsr     -66(a6)
  46.  movem.l (sp)+,a6/d2-d3
  47.  rts
  48.